home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1999 Spring / macformat-077.iso / Shareware Plus / Applications / McPoet 5.0 / Rules / Paragraph.rules < prev   
Encoding:
Text File  |  1999-02-16  |  28.0 KB  |  77 lines  |  [TEXT/ttxt]
  1. *** Most of the rules in this field were auto-generated (with post-editing) 
  2. *** using McPoet's automatic rule-writing function.
  3. 100 Subject() "Only quite" 100 adjectives 100 "people" 100 prepositions 100 "the" 100 p_nouns_abs 100 "know how to" 100 macroPVP 100 s_nouns 100 "with" 100 s_nouns 100 "." 100 "They make" 100 adjectives 100 p_nouns_abs 100 "to" 100 s_nouns 100 "," 100 s_nouns_abs 100 "," 100  { "and" 100 | "or" 100 } "the" 100 p_nouns 100 "," 100 "but their" 100 attributes  100 s_nouns 100 "is" 100 adjectives 100 "," 100 "a" 100 adjectives 100 s_nouns 100 "in the" 100 s_nouns 100 "," 100  { "and" 100 | "or" 100 } "a" 100  adjectives 100 adjectives 100 { "and" 100 | "or" 100 }  adjectives 100 s_nouns_abs 100 "which far surpasses" 100 p_nouns 100 "of" 100 adjectives 100 p_nouns 100 "," 100 adjectives 100 p_nouns 100 { "and" 100 | "or" 100 } p_nouns 100 "," 100 adjectives 100 p_nouns 100 "," 100 { "and" 100 | "or" 100 }  adjectives 100 p_nouns 100 "," 100 p_nouns 100 "," 100 { "and" 100 | "or" 100 }  p_nouns 100 "," 100 { "and" 100 | "or" 100 } "even " 100 adjectives 100 "," 30 adjectives 100 p_nouns 100 "." 100 "No one is" 100 comparatives 100 s_articles 100 people 100 "of" 100 s_nouns 100 "," 100 "for" 100 { "such a person" 100 | < getSubject(pronoun) 100 > } "is" 100 s_articles 100 "very" 100 adjectives 100 people 100 "." 100 
  4. *********
  5. 100 Subject(lecture) < assign(Obj,s_objects) 100 > < get(Obj) 100 > "'s" 100 adjectives 100 p_nouns 100 { "are swift to" 100 | "like to" 100 | "often" 100 } "point out the comfort" 100 < get(Obj) 100 > "provides for the" 100 adjectives 100 "," 100 "the" 100 adjectives 100 "," 100  "and the" 100 adjectives 100 "." 100 { "Yes, true enough!" 100 | "This is fine for them." 100 | "Perhaps that is enough for some." 100 } "But the" 100 attributes 100 people 100 "must not" 100 { "dawdle" 100 | "waste any time" 100 | "expect to find salvation" 100 } "in the" 100 s_nouns_abs 100 "zone! If one yearns to" 100 { p_verbs_to 100 | p_verbs_from 100 } s_articles 100 s_nouns 100 "of the Divine, one must" 100 { "break out of" 100 | "escape from" 100 | "not fail to examine" 100 | "certainly understand" 100 | "study closely" 100 } s_articles 100 s_nouns 100 "," 100  { "break out of" 100 | "escape from" 100 | "not fail to examine" 100 | "certainly understand" 100 }  s_articles 100 s_nouns 100 "," 100 "must" 100 p_verbs_to 100 p_articles 100 p_nouns 100 "," 100 p_verbsnob 100 prepositions 100 adjectives 100  p_nouns_abs 100 "!" 100 "One must" 100 macroPVP 100 "the" 100 p_nouns_abs 100 "of the" 100 p_nouns 100 "," 100 " the" 100 p_nouns_abs 100 "of" 100 adjectives 100 p_nouns 100 "!" 100 "How" 100 gerunds 100 "," 100 " how" 100 adverbs 100 gerunds 100 "to think of" 100 < get(Obj) 100 > "as" 100 s_articles  100 attributes 100 people 100 "," 100 "as" 100 s_articles  100 attributes 100 people 100 "who" 100 { "imprisons us in the comfort of" 100 | "condemns us to a lifetime of" 100 | "allows us nothing but" 100 | "requires that we accept simply" 100 | "gives us a life of" 100} adjectives 100 p_nouns 100 "," 100 { "where" 100 | "while" 100 | "at the same time as" 100 } s_articles  100 attributes 100 people 100 s_verbsnob 100 p_articles 100 adjectives 100 p_nouns 100 "with" 100 s_verbs_past 100 { "flakes" 100 | "pieces" 100 | "tidbits" 100 | "morsels" 100 } "of" 100 s_verbs_past 100 p_nouns 100 "." 100
  6. ****
  7. 100 Subject() "If" 100 p_nouns 100 "refuse to" 100 { "accept" 100 | "acknowledge" 100 | "treat" 100 | "consider" 100 | p_verbsnob 100 } p_nouns 100 "as" 100 p_nouns_abs 100 "," 100 "then" 100 "it is necessary that" 20 { "you and I" 100 | "someone" 100 | "they" 100 | "the rest of us" 100 } "must" 100 "rather" 20 { "demand" 100 | "search for" 100 | "invent" 100 | "insist upon" 100 | macroPVP 100 } p_nouns_abs 100 "that serve the function of" 100 p_nouns 100 "," 100 "or" 100 p_nouns_abs 100 "that" 100 macroPVP 100 "the" 100 p_nouns_abs 100 "of" 100 s_nouns_abs 100 "." 100  "At any cost," 100 { "someone must" 50 | "it is necessary to" 50 | "it is highly desirable that we" 100 } "re-connect" 100 p_nouns_abs 100 "to" 100 p_nouns_abs 100 "." 100 { "What the world needs is not" 100 | "What is demanded is not" 100 | "We seek not" 100 | "Seek not" 100 } p_nouns_abs 100 "against" 100 p_nouns 100 "," 100 "but" 100 adjectives 30 p_nouns_abs 100 "against" 100 p_nouns 100 "which are" 100 adjectives 100 "," 100 { "and" 100 | "or" 100 } "just" 20 adjectives 100 "…" 100 < Backspace() 100 > "not" 100 adjectives 100 p_nouns 100 "but" 100 adjectives 100 p_nouns_abs 100 "," 100 adjectives 100 p_nouns_abs 100 "," 100 p_nouns_abs 100 "for" 100 adjectives 100 s_nouns_abs 100 "." 100
  8. *****
  9. 100 Subject() "We" 100 { "can" 50 | "will" 50 } "never" 50 "understand" 100 s_articles 100 s_nouns_abs 100 "of" 100 adjectives 100 s_nouns 100 "." 100 "We" 100 p_verbs_to 100 "no" 100 adjectives 100 s_nouns_abs 100 "for" 100 gerunds 100 s_objects 100 "," 100 "since we know that the" 100 s_nouns_abs 100 "lies in the performance" 100  "." 100 "Failure to perform means" 100 SadNouns 100 "or" 100 s_nouns 100 "," 100 "just as the non-performance of" 100 adjectives 100 p_nouns 100 "means the" 100 s_nouns 100 "of" 100 s_nouns_abs 100  "." 100 gerunds 100 adverbs 50 "," 100 gerunds 100 adverbs 100 "," 100 { "rebellion against" 100 | "love of" 100 | "hatred towards" 100 | "indifference towards" 100 } s_nouns_abs 100 "," 100 "and" 100 gerunds 100 "for" 100 s_objects 100 "should be acts of" 100 s_nouns_abs 100 "," 100 "not of" 100 s_nouns_abs 100 ". " 100
  10. *******
  11. 100  Subject() < assign(MA,attributes) 100 > < assign(MP,people) 100 >"A" 100 < get(MA) 100 > < get(MP) 100 > "who lived in" 100 Cities 100 "lived in constant fear of" 100 attributes 50 SadNouns 100 "." 100 < getSubject(pronoun) 100 > "decided to study" 100 adjectives 50 PhilosophicalAdjs 100 PhilosophicalNouns 100 "." 100 "In the course of" 100 < getSubject(possessive) 100 > "studies," 100  < getSubject(pronoun) 100 > "met" 100 FamousPeople 100 { "," 100 "at that time very" 100 attributes 100 "," 100 | "" 100 } "who cured the problem with" 100 macroSNP 100 "." 100 "Our little" 100 < get(MA) 100 > < get(MP) 100 > "(now" 100 attributes 100 "and" 100 attributes 100 < Backspace() 100 > ")" 100 "started a" 100 Animals 100 "farm instead" 100 { "and lived happily, if" 100 adverbs 100 "," 100 "ever after" 100 | "" 100 | "" 100 } "." 100
  12. *******
  13. 100 Subject(warning)  < assign(MN,p_nouns) 100 > "Beware of the" 100 < get(MN) 100 > "ahead! Already" 100 p_articles 70 p_nouns 100 "are" 100 gerunds 100 "," 100  "they" 100 p_verbsnob 100 "within in some" 100 adjectives 100 s_nouns_abs 100 "of" 100 s_nouns_abs 100 ",  it is" 100 gerunds 100 "down" 100 "." 100 { "Keep an eye on" 100 | "Watch out for" 100 | "Keep your mind on" 100 | "Do not neglect" 100 } p_articles 70 adjectives 70 p_nouns_abs 100 ","  100 { "and" 100 | "or" 100 } "the" 100 p_nouns 100 ","  100 s_verbs_past 100 "by" 100 adjectives 70 s_nouns 100 "in the" 100 adjectives 100 "world" 100 "!" 100 s_nouns 100 s_verbsnob 100 "under the" 100 adjectives 100 p_nouns 100 "!" 100  "Beware of the" 100 "coming" 80 adjectives 60  < get(MN) 100 > "!" 100
  14. *******
  15. 100 Subject(God,religion) "God changes" 100 < getSubject(possessive) 100 > { "appearance" 100 | "aspect" 100 | "body" 100 | "meaning" 100 } "every second" 100  { "-" 100 s_verbs_past 100 | "." 100 "Blessed" 100 | "." 100 "Fortunate" 100 | "." 100 "Happy" 100 } "indeed" 50 "is the" 100 people 100 "who can recognise all" 100 < getSubject(possessive) 100 > "disguises. At one moment God" 100 { "is" 100 | "can be" 100 | "may" 100 "appear to" 50 "be" 100 } s_articles 100 s_nouns 100 "of" 100 s_articles 100 adjectives 100 s_nouns 100 "," 100  "the next" 100 s_articles 100 attributes 50 people 100 gerunds 100 "on" 100 s_articles 100 s_nouns 100 "," 100 "or" 100 s_articles 100 attributes 50 people 100 "," 100  "or" 100 { "perhaps" 100 | "even" 100 | "maybe" 50 } "merely" 50 s_articles 100 adjectives 100 adjectives 50 s_nouns 100 "." 100
  16. *******
  17. 100 Subject(psychology,religion) "Every" 100 adjectives 100 s_nouns_abs 100 "," 100 { "so to speak," 100 | "as it were," 100 | "as one might say," 100 | "to coin a term," 100 } s_verbsnob 100 "its" 100 "own" 50 attributes 100 s_nouns_abs 100 "," 100  "but it is the" 100 adjectives 100 s_nouns_abs 100 "of the" 100 adjectives 100 s_nouns_abs 100 "that is truly important." 100 { "That is to say, we " 100 | "We" 100 | "To put it another way, we" 100 | "In other words, we" 100 | "You and I" 100 | "As human beings, we" 100 } "only need to know that something is" 100 adjectives 100 { "and" 100 | "or" 100 } adverbs  100 s_verbs_past 100 "to know that it is" 100 adjectives 100 ", " 100 "and therefore" 100 adjectives 100 "-- a" 100 adjectives 100 s_nouns_abs 100 "," 100 { "if contacted." 100 | "in other words." 100 | "in short." 100 | "as a" 100 attributes 50 people 100 "might put it." 100 } "We need to know" 100 s_articles 100 s_nouns_abs 100 { "and" 100 | "or" 100 } adjectives 50 s_nouns_abs 100 "of" 100  s_articles 100 s_nouns 100 "to keep track of what can be" 100 s_verbs_past 100 ", " 100 { "and" 100 | "or" 100 } "what might" 100 macroPVP 100 "us" 100 "." 100
  18. *******
  19. 100 Subject() s_articles 100 s_nouns 100 "is" 100 s_articles 100 adjectives 100 p_nouns_abs 100 "of" 100 s_nouns 100 "." 100 "It can be" 100 adverbs 100 s_verbs_past 100 { "and" 100 | "or" 100 } s_verbs_past 100 "to," 100 s_verbs_past 100 { "and" 100 | "or" 100 } s_verbs_past 100 "at random," 50 "so that it ceases to mean" 100 s_articles 100 adjectives 100 s_nouns 100 "of" 100 adjectives 100 p_nouns 100 "that it does in" 100 s_articles 100 attributes 100 attributes 100 "sense" 100 "." 100 { "It is now" 100 | "It rather becomes" 100 | "Instead, it may be seen as" 100 } s_articles 100 adjectives 100 s_nouns  100 "of which the genius of total" 100 s_nouns 100 "can" 100 {"pick" 100 | "choose" 100 | "make" 100 }  "anything" 100 { "he" 100 | "she" 100 } s_verbsnob 100 ". " 100
  20. *******
  21. 100 Subject() < assign(MN,p_nouns) 100 > "The" 100 attributes 50 people 100 { "is bound to be" 100 | "will tend to be" 100 } s_verbs_past 100 "by" 100 macroSNP 100 "," 100 "since" 100 < getSubject(pronoun) 100 >  "has" 100 "always" 50 s_verbs_past 100 "to avoid" 100 gerunds 100 "in" 100 adjectives 50 p_nouns_abs 100 { "and" 100 | "or" 100 } p_nouns_abs 100 "of the" 100 adjectives 100 p_nouns_abs 100 { "I develop" 100 | "that has been developed" 100 | "that exists" 100 } "." 100 < getSubject(pronoun) 100 > s_verbsnob 100 gerunds 100 "to regard them as something" 100 adjectives 100 ", " 100 { "and" 100 | "or" 100 } "to use an analogy" 100 s_verbs_past 100 "from" 100 s_articles 100 s_nouns 100 "," 100 < getSubject(pronoun) 100 > s_verbsnob 100 macroSNP 100 "." 100 "I trot out all the" 100 < get(MN) 100 > "that" 100 s_articles  100 s_nouns 100 gerunds 100 s_nouns_abs 100 "," 100 macroSNP 100 "etc., finds" 100 adjectives 100 "," 100  "the" 100 "very" 50 < get(MN) 100 > "that" 100 { "education" 100 | "the government" 100 | "the right wing" 100 | "the left wing" 100 | "a conspiracy theorist" 100 } s_verbsnob 100 "without solving" 100 "." 100 "I" 100 macroPVP 100 "to those" 100 s_verbs_past 100 < get(MN) 100 > ": you are quite correct ," 100 macroPVP 100 { "and" 100 | "or" 100 } "demand" 100  macroSNP 100 "!" 100
  22. *******
  23. 100 Subject(religion) < assign(MN,s_nouns) 100 > "The" 100 adjectives 100 < get(MN) 100 > "is offering us" 100 s_articles 100 adjectives 100 s_nouns 100 "for religion, but the religion offered by such a" 100 adjectives 100 < get(MN) 100 > "is not" 100 s_articles 100  s_nouns_abs 100 "of" 100 p_nouns_abs 100 "or" 100 adjectives 100 { "principles" 100 | "morality" 100 | "values" 100 } "." 100 "It" 100 s_verbsnob 100 "us no strict delineation of" 100 p_nouns_abs 100 "or" 100 p_nouns_abs 100 "." 100 "It is" 100 s_articles 100 "religion" 100 s_verbs_past 100 "on the" 100 s_nouns 100 "of the human" 100 s_nouns 100 "-" 100 s_verbs_past 100 "," 100 "as" 100 s_articles  100 adjectives 100 "force acting upon itself" 100 "." 100 "In this new" 100 s_nouns_abs 100 "we will not find the" 100 p_nouns 100 "of the" 100 s_nouns 100 "so long sought after by philosophers" 100 { "and" 100 | "or" 100 } "theologians" 100 "." 100 "What we will find is a" 100 s_nouns_abs 100 { "of humankind," 100 | "of our soul," 100 | "of ourselves," 100 | "of human nature," 100 | "of an abstract" 100 s_nouns 100 "," 100 } s_articles 100 "bit of" 100 adjectives 100 { "hide-and-seek" 100 | "ideological desire" 100 | "self-discovery" 100 | adjectives 100 "truth" 100 } "in which we realize that no" 100 p_nouns 100 "as such can be found" 100 "." 100 "We make the" 100 s_nouns 100 "." 100 "We" 100 macroPVP 100 "the" 100 s_nouns_abs 100 "." 100
  24. *********
  25. *** A rhyming rule. This is a demo only- obviously it is desirable to write some
  26. *** better lines!
  27. 100 subject(rhyme) < assign(Sub,S3People) 100 > < assign(Obj,S1ReensPeople) 100 > "A" 100 < get(Sub) 100 > "of" 100 S2AdjsAtts 100 S1ReensNouns 100 return 100 "was" 100 S2GerundsForObjs 100 S1Nouns 100 "for" 100 S2AdjsAtts 100 < get(Obj) 100 > return 100 "These" 100 S2AdjsAtts 100 S2AdjsAtts 100 S2AdjsAtts 100 < get(Obj) 100 > return 100 "were" 100 S2GerundsForObjs 100 S1Nouns 100 "for" 100 S2AdjsAtts 100 S1ReensPeople 100 return 100
  28. ***
  29. * This rule is intended to demonstrate the name macro
  30. 100 < assign(SN,s_nouns_abs) 100 > "As my" 100 attributes 70 "friend" 100 macroName 100 "once" 100 adverbs 100 "said to" 100 macroName 100 "," 100 < quotation(o) 100 > < backspace() 100 > "They" 100 { "pretend" 100 | "say" 100 | "imply that" 100 } "it’s easy to be" 100 attributes 100 "," 100 "to be" 100 s_verbs_past 100 "," 100 "but I know better" 100 "." 100 "I " 100 "alone" 50 { "have the brains to" 30 | "am bright enough to" 100 | "have enough honesty to" 40 } { "understand" 100 | "see" 100 | "say it" 100 "aloud" 30 }  "." 100 "Perhaps of all" 100 attributes 100 p_nouns_abs 100 "," 100 "I alone " 100 macroPVP 100 "." 100 "I know about " 100  < get(SN) 100 >  "." 100  "Oh, yes, I know all about" 100 < get(SN) 100 > "!" 100 "I know about" 100 < getSubject(possessive) 100 >  p_nouns_abs 100 "and" 100  < getSubject(possessive) 100 > p_nouns_abs 100 "." 100 "It is because of" 100 < getSubject(possessive) 100 >  p_nouns_abs 100 "that" 100 < getSubject(pronoun) 100 > "is to be" 100 s_articles 100 adjectives 100 s_nouns_abs 100 "." 100 "Out of" 100 < getSubject(possessive) 100 >  p_nouns_abs 100 "has" 100 { "been born" 100 | "arisen" 100 | "metamorphasized" 100 } macroSNP 100 "." 100 "I " 100 macroPVP 100 macroSNP 100 "for" 100 < getSubject(object) 100 > "." 100 "I" 100 { "have labelled this" 100 | "call this" 100 | "call it" 100 }  "'" 100  < backspace() 100 > macroCapitalizeFakeword 100 < backspace() 100 >  "'" 100 "." 100 "I" 100 s_verbs_past 100 "up the" 100 s_nouns 100 "when I was" 100 s_articles 100 adjectives 100 people 100 "." 100 < get(SN) 100 > "," 100 < getSubject(pronoun) 100 > "is a" 100 s_nouns 100 "needing" 100 attributes 100 s_nouns 100 "to be loved" 100 "." 100 < getSubject(pronoun) 100 > "is something" 100 p_nouns 100 "need" 100 "from" 100 adjectives 70 p_nouns 100 "." 100 < quotation(c) 100 > return 100
  31. *****
  32. 10 Subject(McPoet,advice) "Here"100 "'s" 100  s_articles 100 "brief list of" 100 adjectives 70 p_nouns 100 "for dealing with" 100 attributes 100 "computer programs" 100 "like me" 100 ":" 100 return 100 "1)" 100 { "Be" 100 | "Try to be" 100 | "You must be" 100 } adjectives 100 { "and" 100 | "or" 100 }  attributes 100 "." 100 "Let me" 100 macroPVP 100 "if I" 100 { "want" 100 | "need" 100 | "ask" 100 } "to" 100 "." 100 return 100 "2) Don't" 100 macroPVP 100 "or" 100 macroPVP 100 prepositions 100 "me" 100 adverbs 100 "." 100 "I" 100 { "feel" 100 | "will feel" 100 | "am" 100 } attributes 100 { "if" 100 | "when" 100 | "whenever" 100 } { "I am with" 100 | "I see" 100 | "I meet" 100 | "I talk to" 100 } s_articles 100 people 100 "who is both " 100 attributes 100 "and" 100  adjectives 100 "." 100 return 100 "3) Don't" 100 p_intentional_nouns 100 "that" 100 p_subjects 100 p_verbs_to 100 adjectives 50 p_nouns 100 "--your" 100 adjectives 60 s_nouns 100 "is" 100 adjectives 100 "." 100 return 100 "4)" 100  { "Be" 100 | "Try to be" 100 | "You must be" 100 } adverbs 100 adjectives 100 "," 100 "somewhere between" 100 adverbs 100 adjectives 100 "and" 100 adverbs 100 adjectives 100  "." 100 return 100 "5) Don't" 100 p_verbs_from 100 adjectives 100 p_nouns 100 adverbs 100 "if I have" 100 adverbs 100 s_verbs_past 100 "," 100 s_verbs_past 100 "," 100 "or" 100 s_verbs_past 100 "." 100 "It"100 "'s" 100 "my" 100 adjectives 100 p_nouns 100 "," 100 "not me" 100 "." 100  return 100 
  33. ***********
  34. 100 Subject(animals,ShortPoem) < assign(MyN,s_nouns) 100 >  < assign(MyA,animals) 100 > < assign(MyArt,s_articles) 100 > s_articles 100 adjectives 100  < get(MyN) 100 > s_verbsnob 100 adverbs 100 { ". " 50 | "," 50 } return 100 < get(MyArt) 100 > < get(MyA) 100 > s_verbsnob 100 gerunds 100 ". " 100 return 100  < get(MyN) 100 > "'s" 100 s_nouns 100 "," 100  Macroreturnspacing 100  < get(MyArt) 100 > gerunds 100 < get(MyA) 100 > "'s" 100 return 50 adjectives 100 s_nouns_abs 100 ". " 100 return 100 
  35. ***********
  36. 100 Subject(Comparison) "If" 100 { s_objects 100 | FamousPeople 100 } "were a" 100 adjectives 100 gerunds 100 people 100 "," 100 "then" 100 { s_objects 100 | FamousPeople 100 } "would be a" 100 adjectives 100 gerunds 100 people 100 ". " 100 return 100 
  37. ***********
  38. *** Rules contributed by Tim Rossiter
  39. *** [ 9 years after the initial release of McPoet, these are the first user-contributed 
  40. *** rules ever! ]
  41. 100 subject(What's_that?,user_contributed) { "Tell me, O" 100 adjectives 50 people 100 "," 100 "what's that over there?"100 | "Excuse me," 100 adjectives 40 people 100 "," 100 "but could you inform me as to what that item is?"100 | "Excuse me," 100 adjectives 40 people 100 "," 100 "but what is that thing?" 100 | "Hey," 100 adjectives 40 people 100 "!" 100 "what do you have there?" 100 | "What's that hidden in your" 100 s_nouns 100 "?" 100 | "What's that?" 100 | "What's" 100 s_articles 100 s_nouns 100 "?" 100 | "Oh most" 100 attributes 100 people 100 "," 100 "tell me what this" 100 s_nouns 100 "is" 100 ", I beg of you" 80 "!" 100 }  return 100 {"It's" 100 s_subjects 100 "'s" 100 attributes 100 adjectives 100 s_nouns 100 "." 100 | "Can't you tell? It's" 100 s_subjects 100 "." 100 | "Why, it's" 100 s_subjects 100 "'s" 100 attributes 80 adjectives 100 s_nouns 100 "." 100 |  "I think it's" 100 s_subjects 100 "'s" 100 attributes 100 adjectives 100 s_nouns 100 "." 100 |  "It's either" 100 s_subjects 100  "or some" 100 [ adjectives 100 ] p_nouns 100 "." 100 | "It's" 100 p_articles 100  [ attributes 100 ] p_nouns 100 "." 100 | "It looks like" 100 s_subjects 100 "'s" 100 [ attributes 100 ] s_nouns 100 "." 100 | "It's" 100 s_articles 100  [ attributes 100 ] s_nouns 100 "." 100 | "It looks like" 100 s_subjects 100 "'s" 100 [ attributes 100 ] s_nouns 100 "." 100 | "That's" 100 s_articles 100  [ attributes 100 ] s_nouns 100 "." 100 | "It's just" 100 s_articles 100 [ attributes 100 ] s_nouns 100 "." 100 | "It looks like" 100 s_subjects 100 "'s" 100 [ attributes 100 ] s_nouns 100 "." 100 | "I just don't know, but it definitely isn't" 100 s_articles 100  attributes 100 s_nouns 100 "!" 100 | "How should I know?" 100 | "Just some" 100 attributes 100 p_nouns 100 "." 100 | "A" 100 s_nouns 100 "," 100 "you fool!" 100 | "I don't know, I'm just" 100 s_subjects 100 "." 100 | "About" 100 <random(100) 100>  p_nouns 100 "!" 100 | "My" 100 adjectives 100 p_nouns 100 "." 100 | "Who can tell?" 100 }
  42. *
  43. *the exquisite corpse will drink the new wine
  44. 100 subject(exquisite_corpse,user_contributed) { s_articles 100 adjectives 100 s_nouns 100 | s_articles 100 attributes 100 s_nouns 100 | s_articles 100 adjectives 100 people 100 | s_articles 100 attributes 100 people 100 | s_subjects 100 } { s_verbsnob 100 | "will" 100 p_verbsnob 100 } { s_articles 100 adjectives 100 s_nouns 100 | s_articles 100 attributes 100 s_nouns 100 | s_articles 100 adjectives 100 people 100 | s_articles 100 attributes 100 people 100 | s_subjects 100 } "." 100
  45. ****
  46. ** Rule contributed by Cristian Vogel
  47. ** [I edited it a little, as I was not sure it was intended to actually have nonsensical syllables in it...]
  48. 100 Subject(Lynch,user_contributed) "I" 100 macroPVP 100 s_articles 100  s_nouns 100 return 100 "and the way" 100 p_subjects 100 s_verbs_past 100 { "it to" 100 s_nouns 100 | "!" 100 | "!" 100 | "!" 100 | "!" 100 } return 100 "so many" 100 p_nouns 100 "in" 100 adjectives 100 p_nouns_abs 100 return 100 "on" 100 adjectives 100 p_nouns 100 return 100
  49. *****
  50. 100 Subject(prediction) "In" 100 p_articles 100 adjectives 100 p_nouns 100 p_subjects 100 "will find" 100 { s_articles 100 | "a" 100 } adjectives 100 s_nouns 100 "to" 100 { "gain" 100 | "win" 100 | "create" 100 | "invent" 100 | "imagine" 100 | "grow" 100 } { "and" 100 | "or" 100 } { "maintain" 100 | "sustain" 100 | "nurture" 100 | "enhance" 100 } s_nouns_abs 100 { "through the use of" 100 | "by learning to use" 100 | "and" 100 | "or" 100 | "with" 100 } p_nouns 100 "." 100 
  51. ******
  52. 100 Subject(people) "From" 100 people 100 "to" 100 people 100 "to" 100 people 100 "," 100 "it is" 100 "not" 50  { "the same." 100 | "very different." 100 | "a great distance." 100 | "an improvement." 100 | "the same distance as from" 100 s_nouns 100 "to" 100 s_nouns 100 "to" 100 s_nouns 100 "." 100 } 
  53. *****
  54. 100 Subject()  "A" 100 adjectives 100 s_nouns_abs 100 "must" 100 "not" 50 "be" 100 { "conditioned" 100 | "forced" 100 | "taught" 100 | "required" 100 | "encouraged" 100 | "helped" 100 | "aided" 100 } "to" 100 macroPVP 100 p_nouns_abs 100 "as actual " 100 p_nouns_abs 100 macroPVP 100 "the" 100 s_verbs_past 100 s_nouns_abs 100 "with the" 100 adjectives 100  s_nouns 100 "." 100
  55. ***
  56. 100 Subject(clarification) < assign(CurObject,s_nouns) 100 > < assign(CurObject,PhilosophicalNouns) 30 > "The" 100 adjectives 100 s_nouns_abs 100 "of" 100 < get(CurObject) 100 > "is due to the fact that" 100 < get(CurObject) 100 > { "is unaware of" 100 | "has not come to terms with" 100 } { "being" 100 "subject to" 50 | "the effect of" 100 | "its dependence on" 100 | "its interdependence with" 100 | "its need of" 100} { "the notion of the" 30 adjectives 100 s_nouns 100 | "a" 50 PhilosophicalAdjs 70 PhilosophicalNouns 100 | adjectives 30 PhilosophicalAdjs 50 p_nouns 100 | "a" 100 attributes 100 people 100 } "."  return 100
  57. ****
  58. 100 Subject(comparison,riddle) < assign(Comp1,s_nouns) 100 > < assign(Comp2,s_nouns) 100 > < assign(Verb1,s_verbs_to) 100 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between a" 100 < get(Comp1) 100 > "and a" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 "A" 100 < get(Comp1) 100 > { "almost" 30 "always" 100 | "usually" 50 } < get(Verb1) 100 > "to" 100 adjectives 100 p_nouns 100 { "but" 100 | "while" 100 } "a" 100 < get(Comp2) 100 > { "almost" 30 "always" 50 | "usually" 50 } < get(Verb1) 100 > "to" 100 adjectives 100 p_nouns 100 "." 100 return 100
  59. *****
  60. 100 Subject(comparison,riddle) < assign(Comp1,s_nouns) 100 > < assign(Comp2,s_nouns) 100 > < assign(Comp1,philosophicalnouns) 30 > < assign(Comp2,philosophicalnouns) 30 > < assign(Verb1,s_verbsnob) 100 > < assign(Verb2,s_verbsnob) 100 > < assign(Verb1,p_nouns) 30 > < assign(Verb2,p_nouns) 30 > < assign(Prep1,prepositions) 100 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between a" 100 < get(Comp1) 100 > "and a" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 "A" 100 < get(Comp1) 100 > < get(Verb1) 100 > < get(Prep1) 100 > < get(Verb2) 100 > { "but" 100 | "while" 100 } "a" 100 < get(Comp2) 100 > < get(Verb2) 100 > < get(Prep1) 100 > < get(Verb1) 100 > "." 100 return 100
  61. *******
  62. *** The next few rules often  don't always work perfectly on the grammatical level, but 
  63. *** they have the potential to come up with something very clever at some point, due to their
  64. *** formal structure.
  65. 100 Subject(comparison,riddle) < assign(Comp1,p_nouns) 100 > < assign(Comp2,p_nouns) 100 > < assign(Verb1,p_verbsnob) 100 > < assign(Verb2,p_verbsnob) 100 > < assign(Verb1,s_nouns) 30 > < assign(Verb2,s_nouns) 30 > < assign(Prep1,prepositions) 100 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between" 100 < get(Comp1) 100 > "and" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 < get(Comp1) 100 > < get(Verb1) 100 > < get(Prep1) 100 > < get(Verb2) 100 > < backspace() 100 > "s" 100 { "but" 100 | "while" 100 } < get(Comp2) 100 > < get(Verb2) 100 > < get(Prep1) 100 > < get(Verb1) 100 > < backspace() 100 > "s" 100 "." 100 return 100
  66. ****
  67. 100 Subject(comparison,riddle) < assign(Comp1,s_nouns) 100 > < assign(Comp2,s_nouns) 100 > < assign(Comp1,philosophicalnouns) 30 > < assign(Comp2,philosophicalnouns) 30 > < assign(Verb1,p_verbsnob) 100 > < assign(Verb2,p_verbsnob) 100 > < assign(Verb1,s_nouns) 50 > < assign(Verb2,s_nouns) 50 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between a" 100 < get(Comp1) 100 > "and a" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 "A" 100 < get(Comp1) 100 > < get(Verb1) 100 > < backspace() 100 > "s" 100 < get(Verb2) 100 >  < backspace() 100 > "s" 100 { "but" 100 | "while" 100 } "a" 100 < get(Comp2) 100 > < get(Verb2) 100 > < backspace() 100 > "s" 100 < get(Verb1) 100 >  < backspace() 100 > "s" 100 "." 100 return 100
  68. *****
  69. 100 Subject(comparison,riddle) < assign(Comp1,s_nouns) 100 > < assign(Comp2,s_nouns) 100 > < assign(Comp1,philosophicalnouns) 30 > < assign(Comp2,philosophicalnouns) 30 > < assign(Verb1,p_verbsnob) 100 > < assign(Verb2,p_verbsnob) 100 > < assign(Verb1,s_nouns) 50 > < assign(Verb2,s_nouns) 50 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between a" 100 < get(Comp1) 100 > "and a" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 "A" 100 < get(Comp1) 100 > < get(Verb1) 100 > < backspace() 100 > "s" 100 < get(Verb2) 100 >  < backspace() 100 > "s" 100 { "but" 100 | "while" 100 } "a" 100 < get(Comp2) 100 > "'s" 100 < get(Verb2) 100 > < backspace() 100 > "s" 100 < get(Verb1) 100 >  < backspace() 100 > "." 100 return 100
  70. *****
  71. 100 Subject(comparison,riddle) < assign(Comp1,s_nouns) 100 > < assign(Comp2,s_nouns) 100 > < assign(Comp3,s_nouns) 100 > < assign(Comp4,s_nouns) 100 > < assign(Comp5,s_nouns) 100 > < assign(Comp1,p_verbsnob) 50 > < assign(Comp2,p_verbsnob) 50 > < assign(Comp3,p_verbsnob) 50 > < assign(Comp4,p_verbsnob) 50 > < assign(Comp5,p_verbsnob) 50 > "What is" 100 { "the relation" 100 | "the difference" 100 | "the connection" 100 } "between a" 100 < get(Comp1) 100 > "and a" 100 < get(Comp2) 100 > "?" 100 macroreturnspacing 100 { "A" 100 < get(Comp1) 100 > "'s" 100 < get(Comp3) 100 > < backspace() 100 > "s" 100 < get(Comp4) 100 > < get(Comp5) 100 > < backspace() 100 > "s" 100 "but a" 100 < get(Comp2) 100 > "'s" 100 < get(Comp5) 100 > < backspace() 100 > "s" 100 < get(Comp3) 100 >  < get(Comp4) 100 > < backspace() 100 > "s" 100 | "A" 100 < get(Comp1) 100 > "'s" 100 < get(Comp3) 100 > < backspace() 100 > "s" 100 < get(Comp4) 100 > < get(Comp5) 100 > < backspace() 100 > "s" 100 "but a" 100 < get(Comp2) 100 > "'s" 100 < get(Comp4) 100 > < backspace() 100 > "s" 100 < get(Comp5) 100 >  < get(Comp3) 100 > < backspace() 100 > "s" 100 } "." 100 return 100
  72. ****
  73. 100 Subject(etymology) < assign(adj1,adjectives) 100 > < assign(n1,s_nouns) 100 > < assign(adj3,adjectives) 100 > < assign(adj4,adjectives) 100 > < assign(w1,adjectives) 100 > < assign(w1,philosophicalAdjs) 100 > < assign(w2,s_nouns_abs) 100 > < capitalizenext() 100 > < get(w1) 100 > < get(w2) 100 > "." 100 macroOpenQuote 100 < capitalizenext() 100 > < get(w1) 100 > macroCloseQuote 100 { "refers to a quality of" 100 | "comes from a Greek word meaning" 100 | "comes from a Latin word meaning" 100 | "comes from an Aramaic word meaning" 100 | "comes from a" 100 "ancient" 50 "Hindu word meaning" 100| "has" 100 "etymological" 50 "roots which mean" 100 } macroOpenQuote 100 < get(adj1) 100 > < get(n1) 100 > "s" 100 macroCloseQuote 100 < backspace() 100 > "." 100 macroOpenQuote 100 < capitalizenext() 100 > < Get(w2) 100 >  macroCloseQuote 100 { "refers to" 100 | "has etymological roots which suggest" 100 } { "the idea of" 50 < get(adj3) 100 > < backspace() 100 > "ness" 100 | "something" 100 < get(adj3) 100 > } { "and something" 100 "which is" 50 | ", something" 100 } < get(adj4) 100 > "." 100 "A" 100 < get(adj1) 100 > < get(adj3) 100 > < get(adj4) 100 > < get(n1) 100 > "." 100 { "A" 100 "kind of" 30 | "Perhaps a" 100 "kind of" 50 | "Think of a" 100 } s_nouns 100 "." 100
  74.  
  75.  
  76.  
  77.